home *** CD-ROM | disk | FTP | other *** search
/ Software of the Month Cl… (Business) 1997 November / Software of the Month Club - Business Shareware (Volume 243) (November 1997).iso / dos / biz / Parse / EXAMPL07.POM < prev    next >
Encoding:
Text File  |  1997-08-27  |  335 b   |  19 lines
  1. ;
  2. ;   Replace every tab character with two spaces
  3. ;
  4. CHANGE   $FLINE  $TAB  "  "
  5. ;
  6. ;   Extract the columns
  7. ;
  8. SET      ProgName = $FLINE[ 1 20]
  9. SET      Descrip  = $FLINE[22 99]
  10. ;
  11. ;   Trim the spaces
  12. ;
  13. TRIM     ProgName  "B"  " "
  14. TRIM     Descrip   "B"  " "
  15. ;
  16. ;   Output the result
  17. ;
  18. OUTEND   |"{ProgName}","{Descrip}"
  19.